Xbasic

DICTIONARY.EXTERNAL_RECORD_CONTENT_GET Function

Syntax

C External_record_content_get(C tablename,C content_expression[,C order[,C filter]])

Arguments

tablename

Character

content_expression

Character

order

Character

filter

Character

Description

Retrieve external tables records in a cr-lf separated list.

Example

This example returns the size of a form without opening it.

function get_form_size as V (formname as C, ptr as P )
dim windowsize as C
dim xTwips as N
dim yTwips as N
dim ptr.str_width as N
dim ptr.str_height as N
windowsize = dictionary.external_record_content_get(a5.Form_Location(formname),"contents_m","","name='"+formname+"'.and.type='FRMI'")
xTwips = val( word(windowsize,2,"FORMSIZE:X=") )
yTwips = val( word(windowsize,2,"FORMSIZE:Y=") )
ptr.str_width   = str(xTwips/(72*20),6,3)
ptr.str_height = str(yTwips/(72*20),6,3)
end function

It is necessary to define a component of ptr before passing it.

dim ptr as P
ptr.foo = "C"
get_form_size("BarChart", ptr)
? ptr.str_height
= 4.938
? ptr.str_width
= 10.552

See Also